home *** CD-ROM | disk | FTP | other *** search
/ PC World 2007 January / PCWorld_2007-01_cd.bin / v cisle / autoit / autoit-v3.2.0.1-setup.exe / Examples / GUI / SampleControls.au3 < prev   
Text File  |  2006-06-20  |  4KB  |  123 lines
  1. ; AutoIt 3.0.103 example
  2. ; 17 Jan 2005 - CyberSlug
  3. ; This script shows manual positioning of all controls;
  4. ;   there are much better methods of positioning...
  5. #include <GuiConstants.au3>
  6.  
  7. ; GUI
  8. GuiCreate("Sample GUI", 400, 400)
  9. GuiSetIcon(@SystemDir & "\mspaint.exe", 0)
  10.  
  11.  
  12. ; MENU 
  13. GuiCtrlCreateMenu("Menu&One")
  14. GuiCtrlCreateMenu("Menu&Two")
  15. GuiCtrlCreateMenu("MenuTh&ree")
  16. GuiCtrlCreateMenu("Menu&Four")
  17.  
  18. ; CONTEXT MENU
  19. $contextMenu = GuiCtrlCreateContextMenu()
  20. GuiCtrlCreateMenuItem("Context Menu", $contextMenu)
  21. GuiCtrlCreateMenuItem("", $contextMenu) ;separator
  22. GuiCtrlCreateMenuItem("&Properties", $contextMenu)
  23.  
  24. ; PIC
  25. GuiCtrlCreatePic("logo4.gif",0,0, 169,68)
  26. GuiCtrlCreateLabel("Sample pic", 75, 1, 53, 15)
  27. GuiCtrlSetColor(-1,0xffffff)
  28.  
  29.  
  30. ; AVI
  31. GuiCtrlCreateAvi("sampleAVI.avi",0, 180, 10, 32, 32, $ACS_AUTOPLAY)
  32. GuiCtrlCreateLabel("Sample avi", 170, 50)
  33.  
  34.  
  35. ; TAB
  36. GuiCtrlCreateTab(240, 0, 150, 70)
  37. GuiCtrlCreateTabItem("One")
  38. GuiCtrlCreateLabel("Sample Tab with tabItems", 250, 40)
  39. GuiCtrlCreateTabItem("Two")
  40. GuiCtrlCreateTabItem("Three")
  41. GuiCtrlCreateTabItem("")
  42.  
  43. ; COMBO
  44. GuiCtrlCreatecombo("Sample Combo", 250, 80, 120, 100)
  45.  
  46. ; PROGRESS
  47. GuiCtrlCreateProgress(60, 80, 150, 20)
  48. GuiCtrlSetData(-1, 60)
  49. GuiCtrlCreateLabel("Progress:", 5, 82)
  50.  
  51. ; EDIT
  52. GuiCtrlCreateEdit(@CRLF & "  Sample Edit Control", 10, 110, 150, 70)
  53.  
  54. ; LIST
  55. GuiCtrlCreateList("", 5, 190, 100, 90)
  56. GuiCtrlSetData(-1, "a.Sample|b.List|c.Control|d.Here", "b.List")
  57.  
  58. ; ICON
  59. GuiCtrlCreateIcon("shell32.dll", 1, 175, 120)
  60. GuiCtrlCreateLabel("Icon", 180, 160, 50, 20)
  61.  
  62. ; LIST VIEW
  63. $listView = GuiCtrlCreateListView("Sample|ListView|", 110, 190, 110, 80)
  64. GuiCtrlCreateListViewItem("A|One", $listView)
  65. GuiCtrlCreateListViewItem("B|Two", $listView)
  66. GuiCtrlCreateListViewItem("C|Three", $listView)
  67.  
  68. ; GROUP WITH RADIO BUTTONS
  69. GuiCtrlCreateGroup("Sample Group", 230, 120)
  70. GuiCtrlCreateRadio("Radio One", 250, 140, 80)
  71. GuiCtrlSetState(-1, $GUI_CHECKED)
  72. GuiCtrlCreateRadio("Radio Two", 250, 165, 80)
  73. GUICtrlCreateGroup ("",-99,-99,1,1)  ;close group
  74.  
  75. ; UPDOWN
  76. GuiCtrlCreateLabel("UpDown", 350, 115)
  77. GuiCtrlCreateInput("42", 350, 130, 40, 20)
  78. GuiCtrlCreateUpDown(-1)
  79.  
  80. ; LABEL
  81. GuiCtrlCreateLabel("Green" & @CRLF & "Label", 350, 165, 40, 40)
  82. GuiCtrlSetBkColor(-1, 0x00FF00)
  83.  
  84. ; SLIDER
  85. GuiCtrlCreateLabel("Slider:", 235, 215)
  86. GuiCtrlCreateSlider(270, 210, 120, 30)
  87. GuiCtrlSetData(-1, 30)
  88.  
  89. ; INPUT
  90. GuiCtrlCreateInput("Sample Input Box", 235, 255, 130, 20)
  91.  
  92. ; DATE
  93. GuiCtrlCreateDate("", 5, 280, 200, 20)
  94. GuiCtrlCreateLabel("(Date control expands into a calendar)", 10, 305, 200, 20)
  95.  
  96. ; BUTTON
  97. GuiCtrlCreateButton("Sample Button", 10, 330, 100, 30)
  98.  
  99. ; CHECKBOX
  100. GuiCtrlCreateCheckbox("Checkbox", 130, 335, 80, 20)
  101. GuiCtrlSetState(-1, $GUI_CHECKED)
  102.  
  103. ; TREEVIEW ONE
  104. $treeOne = GuiCtrlCreateTreeView(210, 290, 80, 80)
  105. $treeItem = GuiCtrlCreateTreeViewItem("TreeView", $treeOne)
  106. GuiCtrlCreateTreeViewItem("Item1", $treeItem)
  107. GuiCtrlCreateTreeViewItem("Item2", $treeItem)
  108. GuiCtrlCreateTreeViewItem("Foo", -1)
  109. GuiCtrlSetState($treeItem, $GUI_EXPAND)
  110.  
  111. ; TREEVIEW TWO
  112. $treeTwo = GuiCtrlCreateTreeView(295, 290, 103, 80, $TVS_CHECKBOXES)
  113. GuiCtrlCreateTreeViewItem("TreeView", $treeTwo)
  114. GuiCtrlCreateTreeViewItem("With", $treeTwo)
  115. GuiCtrlCreateTreeViewItem("tvs_checkboxes", $treeTwo)
  116. GuiCtrlSetState(-1, $GUI_CHECKED)
  117. GuiCtrlCreateTreeViewItem("Style", $treeTwo)
  118.  
  119.  
  120. ; GUI MESSAGE LOOP
  121. GuiSetState()
  122. While GuiGetMsg() <> $GUI_EVENT_CLOSE
  123. WEnd